COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(fasload met12)
C00005 ENDMK
C⊗;
(fasload met12)
(*rset (nouuo ()))

(do ((ntimes 0 (1+ ntimes)))
    ((= ntimes 10.))
    (fft 're 'im))

(meter:report-fft)

Statistics
= <calls> (<percentage>) [runtime (<percentage>)]


Meter for: FFT
Flonum Array Hacking = 2087680 (64.14%) [7.977 (55.08%)]
*$'s = 245720 (7.55%) [1.828 (12.62%)]
Flonum Array Accesses = 224640 (6.9%)
Flonum Array Stores = 224640 (6.9%)
+$'s = 163830 (5.03%) [1.673 (11.55%)]
-$'s = 163830 (5.03%) [1.644 (11.35%)]
>s = 71870 (2.21%) [0.649 (4.48%)]
<s = 40930 (1.26%) [0.381 (2.63%)]
1+s = 20660 (0.63%) [0.177 (1.22%)]
Quotients = 10240 (0.31%) [0.133 (0.92%)]
FLOATs = 200 (0.01%) [3.0E-3 (0.02%)]
/$'s = 200 (0.01%) [1.0E-3 (0.01%)]
↑'s = 110 (0.0%) [1.0E-3 (0.01%)]
SIN = 100 (0.0%) [6.0E-3 (0.04%)]
COS = 100 (0.0%) [9.0E-3 (0.06%)]
1-s = 20 (0.0%) [0.0 (0.0%)]
Gets = 20 (0.0%) [1.0E-3 (0.01%)]
Returns = 10 (0.0%)
Equals = 10 (0.0%) [0.0 (0.0%)]
Total = 3254810	[14.483]

(setq meter:sort-runtime t)
(meter:report-fft)

Statistics
= <calls> (<percentage>) [runtime (<percentage>)]


Meter for: FFT
Flonum Array Hacking = 2087680 (64.14%) [7.977 (55.08%)]
*$'s = 245720 (7.55%) [1.828 (12.62%)]
+$'s = 163830 (5.03%) [1.673 (11.55%)]
-$'s = 163830 (5.03%) [1.644 (11.35%)]
>s = 71870 (2.21%) [0.649 (4.48%)]
<s = 40930 (1.26%) [0.381 (2.63%)]
1+s = 20660 (0.63%) [0.177 (1.22%)]
Quotients = 10240 (0.31%) [0.133 (0.92%)]
COS = 100 (0.0%) [9.0E-3 (0.06%)]
SIN = 100 (0.0%) [6.0E-3 (0.04%)]
FLOATs = 200 (0.01%) [3.0E-3 (0.02%)]
/$'s = 200 (0.01%) [1.0E-3 (0.01%)]
↑'s = 110 (0.0%) [1.0E-3 (0.01%)]
Gets = 20 (0.0%) [1.0E-3 (0.01%)]
Flonum Array Accesses = 224640 (6.9%)
Flonum Array Stores = 224640 (6.9%)
Returns = 10 (0.0%)
Equals = 10 (0.0%) [0.0 (0.0%)]
1-s = 20 (0.0%) [0.0 (0.0%)]
Total = 3254810	[14.483]
T